powered by
"["(x, i)
model_file_name <- system.file(package="rbi", "PZ.bi") PZ <- bi_model(filename = model_file_name) PZ[3:5]
Run the code above in your browser using DataLab